home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / comm / misc / zpoint_3_14.lha / zpoint-3.14 / Install / ZP-Install < prev   
Text File  |  1996-11-02  |  10KB  |  357 lines
  1. ; ***** Define help texts and prompts *************************************
  2.  
  3. (if (= @language "deutsch")
  4.  
  5. ; Desired language is German
  6. (
  7.    (set #bad_kick "Kickstart 37.175 (OS 2.04) wird unbedingt benötigt!")
  8.  
  9.    (set #select_dest
  10.       (cat
  11.          "In welchem Verzeichnis möchten Sie " @app-name
  12.          " (nachfolgend mit ZP bezeichnet) installieren? Bitte"
  13.          " überschreiben Sie *KEINESFALLS* eine bestehende"
  14.          " ZP-Installation mit der neuen Version!"
  15.       )
  16.    )
  17.    (set #select_dest_h
  18.       (cat
  19.          "ZP benötigt ein eigenes Verzeichnis, in das alle relevanten Dateien"
  20.          " kopiert werden. Bitte geben Sie den vollständigen Pfad für dieses"
  21.          " Verzeichnis an. Die beste Lösung ist im Allgemeinen, ein eigenes"
  22.          " Verzeichnis für ZP neu anzulegen."
  23.       )
  24.    )
  25.  
  26.    (set #select_version "Welche ZP-Version möchten Sie installieren?")
  27.    (set #select_version_h
  28.       (cat
  29.          "Sofern Sie einen Amiga mit 68030- oder 68040-CPU besitzen"
  30.          " (Amiga 3000, 4000 oder Amiga 2000 mit '030-Turbokarte), sollten"
  31.          " Sie die spezielle 68030-Version installieren, die eine höhere"
  32.          " Verarbeitungsgeschwindigkeit ermöglicht. Die 68000-Version läuft"
  33.          " im Gegensatz zur 68030-Version auf jedem Amiga-Modell."
  34.       )
  35.    )
  36.  
  37.    (set #select_parts "Welche Teile von ZP wollen Sie installieren?")
  38.    (set #select_parts_h
  39.       (cat
  40.          "Sie sollten an dieser Stelle auf jeden Fall die Online-Hilfe"
  41.          " installieren lassen! Wenn Sie ZP nicht mit deutscher"
  42.          " Benutzerführung betreiben möchten (nur ab OS 2.1 oder besser"
  43.          " möglich), müssen Sie die Katalogdateien"
  44.          " ebenfalls installieren. ARexx- und DOS-Skripten bieten eine Vielzahl"
  45.          " nützlicher Erweiterungen der Funktionalität und Sie sollten,"
  46.          " falls Sie über genügend Platz verfügen, nicht darauf verzichten."
  47.          " Auch die Tools können Ihnen die Arbeit mit ZP noch angenehmer"
  48.          " gestalten. Die mitgelieferten Systembibliotheken werden nur"
  49.          " installiert, wenn die vorliegenden Versionen älteren Datums"
  50.          " sind. Die zusätzlichen Icons sind reine Kosmetik."
  51.       )
  52.    )
  53.  
  54.    (set #select_action "Bitte wählen sie eine Aktion:")
  55.    (set #select_action_h
  56.       (cat
  57.          "Sie können mit Hilfe dieses Skripts entweder Zodiac's Point neu"
  58.          " installieren oder eine bestehende Installation von Ihrer"
  59.          " Festplatte löschen, falls Sie sich aus unerfindlichen Gründen"
  60.          " gegen eine Nutzung entschieden haben."
  61.       )
  62.    )
  63.  
  64.    (set #select_deldir "Zu löschendes Verzeichnis wählen:")
  65.    (set #select_deldir_h
  66.       (cat
  67.          "Das ausgewählte Verzeichnis wird vollständig gelöscht. Bitte"
  68.          " überpfüfen Sie vorher, ob sich dort noch irgendwelche wichtigen"
  69.          " Daten befinden."
  70.       )
  71.    )
  72.  
  73.    (set #dir_deleted "Das von Ihnen gewählte Verzeichnis wurde gelöscht.")
  74.    (set #delete_failed "Das gewählte Verzeichnis konnte nicht gelöscht werden!")
  75.  
  76.    (set #install_zp "Zodiac's Point neu installieren")
  77.    (set #remove_zp "Bestehende Installation entfernen")
  78.  
  79.    (set #cpu_000 "68000-Version (läuft auf jedem Amiga)")
  80.    (set #cpu_030 "68030-Version (MC68030 wird benötigt)")
  81.  
  82.    (set #online_help "Dokumentation / Online-Hilfe")
  83.    (set #catalogs "Katalogdateien")
  84.    (set #arexx_scripts "ARexx-Skripten")
  85.    (set #dos_scripts "DOS-Skripten")
  86.    (set #zp_tools "Unterstützende Tools")
  87.    (set #zp_libs "Systembibliotheken")
  88.    (set #zp_icons "Zusätzliche Icons")
  89.  
  90.    (set #copy_zmodem_lib "'xprzmodem.library' kopieren?")
  91. )
  92.  
  93. ; English is the default language
  94. (
  95.    (set #bad_kick "Requires Kickstart 37.175 (OS 2.04)!")
  96.  
  97.    (set #select_dest
  98.       (cat
  99.          "In which directory do you want to install " @app-name
  100.          " (or ZP, during the following installation)? Please do *NOT*"
  101.          " overwrite an existing ZP installation with the new version!"
  102.       )
  103.    )
  104.    (set #select_dest_h
  105.       (cat
  106.          "ZP requires a directory in which all relevant data will be"
  107.          " copied. Please specify the full path. Usually, the best"
  108.          " solution is to create a new directory for ZP."
  109.       )
  110.    )
  111.  
  112.    (set #select_version "Which version of ZP do you want to install?")
  113.    (set #select_version_h
  114.       (cat
  115.          "There is a special version for Amigas with 68030/68040 CPU"
  116.          " (Amiga 3000, 4000 or Amigas with accellerator cards). It is"
  117.          " faster than the 68000 version, but unlike the latter it will"
  118.          " not run on every Amiga platform."
  119.       )
  120.    )
  121.  
  122.    (set #select_parts "Which parts of ZP do you want to install?")
  123.    (set #select_parts_h
  124.       (cat
  125.          "Installing at least the Online-Help is strongly recommended! If"
  126.          " you want to use an non-German user interface (requires"
  127.          " OS 2.1 or better), you must"
  128.          " install the catalog files aswell. ARexx and DOS scripts improve"
  129.          " functionality a lot, so if there's enough hard disk space, I"
  130.          " suggest to have them copied, too. The tools, also, can make"
  131.          " everyday ZP usage easier. The libraries will only be installed"
  132.          " if the ones found on your system are older. The additional"
  133.          " icons are merely cosmetics."
  134.       )
  135.    )
  136.  
  137.    (set #select_action "Please choose an action:")
  138.    (set #select_action_h
  139.       (cat
  140.          "This script allows you to install Zodiac's Point on your hard"
  141.          " disk, or to remove an existing installation (in the unimaginable"
  142.          " case you decided not to use Zodiac's Point any longer)."
  143.       )
  144.    )
  145.  
  146.    (set #select_deldir "Choose directory to delete:")
  147.    (set #select_deldir_h
  148.       (cat
  149.          "The selected directory will be deleted completely. Please check"
  150.          " if there is any important data left in the directory."
  151.       )
  152.    )
  153.  
  154.    (set #dir_deleted "The selected directory has been deleted.")
  155.    (set #delete_failed "Can't delete selected directory!")
  156.  
  157.    (set #install_zp "Install Zodiac's Point")
  158.    (set #remove_zp "Remove existing installation")
  159.  
  160.    (set #cpu_000 "68000 version (runs on any Amiga platform)")
  161.    (set #cpu_030 "68030 version (requires MC68030 CPU)")
  162.  
  163.    (set #online_help "Documentation / Online-Help")
  164.    (set #catalogs "Catalog files")
  165.    (set #arexx_scripts "ARexx scripts")
  166.    (set #dos_scripts "DOS scripts")
  167.    (set #zp_tools "Supporting tools")
  168.    (set #zp_libs "System libraries")
  169.    (set #zp_icons "Additional icons")
  170.  
  171.    (set #copy_zmodem_lib "Copy 'xprzmodem.library'?")
  172. )
  173.  
  174. )
  175.  
  176. ; ***** Now let's get the work done ***************************************
  177.  
  178. (set def_zpdir "Work:zpoint-3.14")
  179.  
  180. (set act
  181.    (askchoice
  182.       (prompt #select_action)
  183.       (help #select_action_h)
  184.       (choices #install_zp #remove_zp)
  185.    )
  186. )
  187.  
  188. (if (= act 1)
  189. (
  190.    ; Remove Zodiac's Point
  191.    (set deldir
  192.       (askdir
  193.          (prompt #select_deldir)
  194.          (help #select_deldir_h)
  195.          (default def_zpdir)
  196.       )
  197.    )
  198.    (if (= 0 (run (cat "Delete " deldir " " (cat deldir ".info") " ALL FORCE QUIET")))
  199.       (message #dir_deleted)
  200.       (abort #delete_failed)
  201.    )
  202.    (exit (quiet))
  203. )
  204. )
  205.  
  206. ; Install Zodiac's Point
  207. (if (< (/ (getversion "intuition.library" (resident)) 65536) 37) (abort #bad_kick))
  208.  
  209. (complete 0)
  210. (set zpdir
  211.    (askdir
  212.       (prompt #select_dest)
  213.       (newpath)
  214.       (help #select_dest_h)
  215.       (default def_zpdir)
  216.    )
  217. )
  218. (set @default-dest zpdir)
  219.  
  220. (set defcpu 0)
  221. (if (>= (database "cpu") "68030") (set defcpu 1))
  222.  
  223. (set cpu
  224.    (askchoice
  225.       (prompt #select_version)
  226.       (default defcpu)
  227.       (help #select_version_h)
  228.       (choices #cpu_000 #cpu_030)
  229.    )
  230. )
  231.  
  232. (set cpupat (select cpu "zp" "zp030"))
  233. (copyfiles
  234.    (dest zpdir)
  235.    (source "/exec/")
  236.    (pattern cpupat)
  237.    (infos)
  238. )
  239.  
  240. (complete 30)
  241. (set def_mask (BITNOT 0))
  242. (if (< (/ (getversion "locale.library" (resident)) 65536) 38)
  243.    (set def_mask (BITNOT 2))
  244. )
  245. (set mask
  246.    (askoptions
  247.       (prompt #select_parts)
  248.       (help #select_parts_h)
  249.       (default def_mask)
  250.       (choices
  251.          #online_help
  252.          #catalogs
  253.          #arexx_scripts
  254.          #dos_scripts
  255.          #zp_tools
  256.          #zp_libs
  257.          #zp_icons
  258.       )
  259.    )
  260. )
  261.  
  262. (complete 35)
  263. (if (IN mask 0)
  264.    (copyfiles
  265.       (source "/")
  266.       (dest zpdir)
  267.       (pattern "Help")
  268.       (infos)
  269.    )
  270. )
  271.  
  272. (complete 45)
  273. (if (IN mask 1)
  274.    (copyfiles
  275.       (source "/")
  276.       (dest zpdir)
  277.       (pattern "Catalogs")
  278.       (infos)
  279.    )
  280. )
  281.  
  282. (complete 50)
  283. (if (IN mask 2)
  284.    (copyfiles
  285.       (source "/")
  286.       (dest zpdir)
  287.       (pattern "Rexx")
  288.       (infos)
  289.    )
  290. )
  291.  
  292. (complete 75)
  293. (if (IN mask 3)
  294.    (copyfiles
  295.       (source "/")
  296.       (dest zpdir)
  297.       (pattern "Scripts")
  298.       (infos)
  299.    )
  300. )
  301.  
  302. (complete 80)
  303. (if (IN mask 4)
  304.    (copyfiles
  305.       (source "/")
  306.       (dest zpdir)
  307.       (pattern "Tools")
  308.       (infos)
  309.    )
  310. )
  311.  
  312. (complete 85)
  313. (if (IN mask 5)
  314.    (copylib
  315.       (prompt #copy_zmodem_lib)
  316.       (help @copylib-help)
  317.       (source "/Libs/xprzmodem.library")
  318.       (dest "LIBS:")
  319.       (confirm)
  320.    )
  321. )
  322.  
  323. (complete 90)
  324. (if (IN mask 6)
  325.    (copyfiles
  326.       (source "/")
  327.       (dest zpdir)
  328.       (pattern "Icons")
  329.       (infos)
  330.    )
  331. )
  332.  
  333. (complete 95)
  334. (set boards (tackon zpdir "Bretter"))
  335. (makedir boards)
  336. (copyfiles
  337.    (source "")
  338.    (dest boards)
  339. ;   (pattern "boardlist.zp")
  340.    (pattern "#?.zp")
  341. )
  342. (makedir (tackon boards "test"))
  343. (makedir (tackon zpdir "Archiv"))
  344. (makedir (tackon zpdir "pgp"))
  345. (makedir (tackon zpdir "maps"))
  346.  
  347. (copyfiles
  348.    (source "/")
  349.    (dest zpdir)
  350.    (pattern "Lies#?")
  351.    (infos)
  352. )
  353.  
  354. (complete 100)
  355.  
  356. ; ***** End of script *****************************************************
  357.